/************************************************************************/
/*  									*/
/*  cenrplc_MIS.c							*/
/*									*/
/*  Tom Lookabaugh							*/
/*  August 13, 1987							*/
/*  Last Revision: August 15, 1987					*/
/*									*/
/*  DESCRIPTION								*/
/*	Update centroid information.					*/
/*	Modified Itakura-Saito Version: Divide accumulated 		*/
/*	autocorrelations by count and then use Levinson's algorithm	*/
/*	to compute new filter autocorrelations and prediction error.	*/
/*	Also store log of the prediction error.				*/
/*  RETURNS								*/
/*	No significant return value.  Modifies storage pointed to by	*/
/*	updtinfo and centroid.						*/
/*  CALLS								*/
/*	autometh().							*/
/*									*/
/************************************************************************/

#include "stdvq.h"
#include <math.h>

cenrplc (updtinfo, centroid, count) 

    double* updtinfo;	/* pointer to cenupdt member			*/
    double* centroid;	/* vector to be used in updating		*/
    long count;		/* cell population				*/

{

    int d;		/* iteration counter				*/
    
    for (d = 0; d < cdbkupdim; d++) {
	updtinfo[d] /= ((double) count);
    }
    autometh(updtinfo, cdbkupdim - 1, centroid + 1, centroid);
    centroid[cdbkdim - 1] = log(centroid[0]);
}
